home *** CD-ROM | disk | FTP | other *** search
Text File | 1995-10-12 | 529 b | 26 lines | [TEXT/PJMM] |
- unit ConditionalMacros;
-
- { Pascal Interface to the Macintosh Libraries }
-
- { Copyright © Apple Computer Inc. }
- { All Rights Reserved }
-
- { Adapted for use with THINK Pascal 4.0.x by Marco Piovanelli }
-
- interface
-
- { Remember: this file should be used only with THINK Pascal 4.0.x }
-
- {$SETC GENERATINGPOWERPC = FALSE}
- {$SETC GENERATING68K = TRUE}
- {$SETC GENERATINGCFM = FALSE}
- {$SETC CFMSYSTEMCALLS = FALSE}
-
- {$IFC OPTION(MC68881) }
- {$SETC GENERATING68881 = TRUE}
- {$ELSEC}
- {$SETC GENERATING68881 = FALSE}
- {$ENDC}
-
- implementation
- end.